home *** CD-ROM | disk | FTP | other *** search
/ PC Home 109 / PC Home 109.iso / data1.cab / Program_Files / id006.dxr / 00093.ls < prev    next >
Encoding:
Text File  |  2001-03-02  |  1.9 KB  |  64 lines
  1. on exitFrame
  2.   if the timer < 530 then
  3.     if the loaded of member "asteroid1" = 0 then
  4.       preloadMember("asteroid1")
  5.     end if
  6.     if the loaded of member "asteroid2" = 0 then
  7.       preloadMember("asteroid2")
  8.     end if
  9.     if the loaded of member "asteroid3" = 0 then
  10.       preloadMember("asteroid3")
  11.     end if
  12.     if the loaded of member "asteroid4" = 0 then
  13.       preloadMember("asteroid4")
  14.     end if
  15.     if the loaded of member "asteroid5" = 0 then
  16.       preloadMember("asteroid5")
  17.     end if
  18.     if the loaded of member "asteroid6" = 0 then
  19.       preloadMember("asteroid6")
  20.     end if
  21.     if the loaded of member "asteroid7" = 0 then
  22.       preloadMember("asteroid7")
  23.     end if
  24.     if the loaded of member "asteroid8" = 0 then
  25.       preloadMember("asteroid8")
  26.     end if
  27.     go(the frame)
  28.   else
  29.     go(the frame + 1)
  30.   end if
  31. end
  32.  
  33. on mouseUp
  34.   if (the loaded of member "asteroid1" = 0) or (the loaded of member "asteroid2" = 0) or (the loaded of member "asteroid3" = 0) or (the loaded of member "asteroid4" = 0) or (the loaded of member "asteroid5" = 0) or (the loaded of member "asteroid6" = 0) or (the loaded of member "asteroid7" = 0) or (the loaded of member "asteroid8" = 0) then
  35.     if the loaded of member "asteroid1" = 0 then
  36.       preloadMember("asteroid1")
  37.     end if
  38.     if the loaded of member "asteroid2" = 0 then
  39.       preloadMember("asteroid2")
  40.     end if
  41.     if the loaded of member "asteroid3" = 0 then
  42.       preloadMember("asteroid3")
  43.     end if
  44.     if the loaded of member "asteroid4" = 0 then
  45.       preloadMember("asteroid4")
  46.     end if
  47.     if the loaded of member "asteroid5" = 0 then
  48.       preloadMember("asteroid5")
  49.     end if
  50.     if the loaded of member "asteroid6" = 0 then
  51.       preloadMember("asteroid6")
  52.     end if
  53.     if the loaded of member "asteroid7" = 0 then
  54.       preloadMember("asteroid7")
  55.     end if
  56.     if the loaded of member "asteroid8" = 0 then
  57.       preloadMember("asteroid8")
  58.     end if
  59.   else
  60.     sound stop 1
  61.     go(138)
  62.   end if
  63. end
  64.